(Fread_file_name_internal): Call double_dollars when `changed' is set.

diff --git a/src/fileio.c b/src/fileio.c
index aa8ceabaaf60ce329f29e6cc80dd07fd621509b8..0e76991cb7ceb3de83bbd48cb3e6843dd101b414 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3823,7 +3823,7 @@ DEFUN ("read-file-name-internal", Fread_file_name_internal, Sread_file_name_inte
       if (XTYPE (val) != Lisp_String)
        {
          if (changed)
-           return string;
+           return double_dollars (string);
          return val;
        }